home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir26 / epi601_2.zip / FILES06.EXE / AMISS2.PGM < prev    next >
Text File  |  1994-08-22  |  2KB  |  38 lines
  1. ************************************************************************
  2. *AMISS2.PGM  Version 2.0, 18/OCT/1992                                  *
  3. *An Epi Info program to code missing variables for anthropometry values*
  4. *  See Epi Info documentation for more information.                    *
  5. *  by Kevin Sullivan, Division of Epidemiology, Emory University       *
  6. ************************************************************************
  7. echo
  8. echo
  9. echo   If you have already READ a file with anthropometry information in it,
  10. echo   press the ENTER key.  If you have not READ a file, READ your file or
  11. echo   the example file, e.g., READ NUTRI
  12. echo
  13. ?EPI>?
  14. ************************************************************************
  15. *Declare missing variables based on Record Flag                        *
  16. ************************************************************************
  17. Define NOHA #
  18. Define NOWH #
  19. Define NOWA #
  20. If haz<-6 or haz>6 then NOHA=1 else NOHA=0
  21. If whz<-4 or whz>6 then NOWH=1 else NOWH=0
  22. If waz<-6 or waz>6 then NOWA=1 else NOWA=0
  23. If ((haz>3.09) and (whz<-3.09)) or ((haz<-3.09) and (whz>3.09)) then NOHA=1
  24. If ((haz>3.09) and (whz<-3.09)) or ((haz<-3.09) and (whz>3.09)) then NOWH=1
  25. If NOHA then HAZ=.
  26. If NOHA then HAP=.
  27. If NOHA then HAM=.
  28. If NOWH then WHZ=.
  29. If NOWH then WHP=.
  30. if NOWH then WHM=.
  31. If NOWA then WAZ=.
  32. If NOWA then WAP=.
  33. If NOWA then WAM=.
  34. ************************************************************************
  35. echo
  36. echo   The anthropometric indices that were flagged for having extreme or
  37. echo   missing values have been set to missing (i.e., ".").
  38.